$ontl_strt = microtime(true); $datm=date("Y-m-d H:i:s", time()); $userip=$_SERVER['REMOTE_ADDR']; require_once ("smta-tlkd-func-0017.php"); require_once ("conv.php"); require_once ("config.php"); require_once ("xtrt-xxxx-func.php"); require_once ("calc-text-func.php"); require_once ("tlkd-smts-func.php"); require_once ("enrc-text-func.php"); // require_once ("bepl-smpn-func.php"); require_once ("bepl-brkb-func.php"); require_once ("bepl-taal-func.php"); require_once ("bepl-gvkr-func.php"); if ($userip != "84.24.111.116") { // echo "This action cannot be completed for this IP Address.
Please contact us
"; // exit; } ?>
Uiting
echo $invr_bzv1; ?>
Reactie
echo $invr_lnks; ?>
echo $invr_domn; ?>
echo $invr_corp; ?>
echo $invr_ipad; ?>
echo $invr_chbt; ?>
echo $invr_bzkr; ?>
echo $invr_taal; ?>
Verzend
$invr_lnks=str_replace("+"," ",$invr_lnks); $invr_bzv1=str_replace("+"," ",$invr_bzv1); $invr_cont=str_replace("+"," ",$invr_cont); $sinvr_lnks=str_replace(" ","+",$invr_lnks); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $sinvr_cont=str_replace(" ","+",$invr_cont); ///////////////////////////////////////////////// // $invr_lnks=mb_strtolower($invr_lnks); // echo "
INDEX INVOER BZV1 ".$invr_bzv1; // echo "
DOMN ".$invr_domn; // echo "
TAAL ".$invr_taal; // echo "
LNKS ".$invr_lnks; // echo "
IPAD ".$invr_ipad; // echo "
RCHS ".$invr_rchs; // echo "
TABL ".$invr_tabl; // echo "
DOMEINCONTEXT ".$invr_cont; // echo "
INDEX INVOER BZV1 ".$invr_bzv1; // echo "
VRAAG ".$invr_lnks; // echo "
ANTWOORD ".$invr_rchs; // echo "
LEVEL ".$invr_levl; // echo "
DATUM ".$invr_datm; $bzv1_dtls=explode(" ",$invr_bzv1); require_once("time-laps-func.php"); $ontl_rslt=time_laps($ontl_strt."@INTR GVKR"); // echo $ontl_rslt; foreach($bzv1_dtls as $bzv1_key => $bzv1_val) { if(strlen($bzv1_val) > 3) { // echo "
BZV1 KEY ".$bzv1_key." BZV1 VAL ".$bzv1_val; $gw27_rslt=xtrt_xxxx("xdotx".$bzv1_val,$invr_taal,"gw27"); // print_r($gw27_rslt); if(count($gw27_rslt) == 0) { echo "
".$bzv1_val."
"; } } } require_once("time-laps-func.php"); $ontl_rslt=time_laps($ontl_strt."@LEES GW27"); // echo $ontl_rslt; ////////////////////// aiml ///////////////// echo "
"; //////////////////////////////// require_once("time-laps-func.php"); $ontl_rslt=time_laps($ontl_strt."@CHCK GVKR"); // echo $ontl_rslt; $gvkr_rslt=bepl_gvkr($invr_bzv1); // print_r($gvkr_rslt); arsort($gvkr_rslt); echo "
Segmenten van ".$invr_bzv1." COUNT GVKR ".count($gvkr_rslt); require_once("time-laps-func.php"); $ontl_rslt=time_laps($ontl_strt."@BEPL GVKR"); // echo $ontl_rslt; echo "
".$invr_bzv1."
Specifiek
antwoord
Generiek
antwoord
"; foreach($gvkr_rslt as $smts_key => $smts_val) { // echo "
EERSTE TEKEN ".$smts_val[0]; $val_dtls=explode(" ",$smts_val); //echo "
Kenmerk ".$smts_key." ".$smts_val; if($smts_val[0] != "@") { // print_r($val_dtls); $smts_val[0]="-"; $smts_val[1]="-"; $smts_val=str_replace("--","",$smts_val); $ssmts_val=str_replace(" ","+",$smts_val); } $psmts_val="
".$smts_val."
"; $pinvr_bzv1=str_replace($smts_val,$psmts_val,$invr_bzv1); // $smts_calc=calc_text($smts_val); if($val_dtls[0] > 2) { if( $srelt != $smts_val) { $srelt=$smts_val; ?>
echo $pinvr_bzv1; ?>
name=rchs cols=32 rows=1>
echo $invr_eml2; ?>
echo $invr_taal; ?>
echo $invr_sess; ?>
echo $smts_val; ?>
echo $invr_bzv1; ?>
echo $invr_bzv2; ?>
echo $invr_domn; ?>
echo $invr_corp; ?>
echo $invr_ipad; ?>
echo $invr_chbt; ?>
echo $invr_lgrm; ?>
echo $invr_smdm; ?>
echo $invr_name; ?>
echo $invr_chbt; ?>
echo $invr_eml2; ?>
echo $invr_taal; ?>
echo $invr_sess; ?>
echo $smts_val; ?>
echo $invr_bzv1; ?>
echo $invr_bzv2; ?>
echo $invr_domn; ?>
echo $invr_corp; ?>
echo $invr_ipad; ?>
echo $invr_chbt; ?>
echo $invr_lgrm; ?>
echo $invr_smdm; ?>
echo $invr_name; ?>
echo $invr_chbt; ?>
} } if ($smts_key== "karakter" or $smts_key == "gevoel" or $smts_key == "grammatica") { // echo "
Kenmerk ".$smts_key." ".$smts_val; // echo "
".$smts_key."== ".$smts_val."
"; // $sgmt_rslt=bepl_gvkr($smts_val); // echo "
<".$smts_val."
".$sgmt_key." ".$sgmt_val; foreach($sgmt_rslt as $sgmt_key => $sgmt_val) { // echo "
<".$smts_val."
".$sgmt_key." ".$sgmt_val; } $smts_itms=explode("@",$smts_val); // print_r($smts_itms); // echo "
".$smts_key." "; foreach($smts_itms as $itms_key => $itms_val) { // echo "
".$smts_key."== ".$itms_val; if($itms_val != null and $smts_key != 0) { // $itms_rule=xtrt_xxxx("xdotx".$itms_val,$invr_taal,"rule"); echo "--".$itms_key."-".$itms_val; } } // $smts_type=$smts_itms[0]; // $smts_sgmt=$smts_itms[1]; // $smts_text=$smts_itms[2]; // $sgmt_itms=explode(" ",$smts_text); // $itms_cntr=count($sgmt_itms); } } echo "
"; $taal_itms=bepl_taal($invr_bzv1); asort($taal_itms); // print_r($taal_itms); // echo "
URLENCODE INVR BZV1 ".urlencode($invr_bzv1)." INVR BZV1 ".$invr_bzv1." INVR BZV2 ".$invr_bzv2." CHATBOT ".$invr_chbt." INVR TAAL ".$invr_taal." INVR CONT ".$invr_cont."
"; foreach($taal_itms as $taal_key => $taal_val) { // echo $taal_key."#".$taal_val." "; $bzv1_taal=$taal_key; } if ($invr_taal == null) { $invr_taal=$bzv1_taal; } echo "
Taal is ".$invr_taal; $invr_bzv1=str_replace("+"," ",$invr_bzv1); trim($invr_bzv1); $bzv1_itms=explode(" ",$invr_bzv1); // print_r($bzv1_itms); $new_bzv1=""; ////////////////////////////// // sort($smts_rslt); echo "
"; $srelt="XXXXX"; echo "
IS DIT DE TELLER SMTS COUNT ".count($smts_rslt); foreach($smts_rslt as $smts_key => $smts_val) { if (count($smts_rslt) == 0) { $smts_type=100; $smts_text==$invr_bzv1; $ssmts_sgmt=str_replace(" ","+",$invr_bzv1); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); } // echo "
SMTS KEY ".$smts_key." SMTS VAL ".$smts_val; $smts_itms=explode("!!",$smts_key); // print_r($smts_itms); $smts_type=$smts_itms[0]; $smts_sgmt=$smts_itms[1]; $ssmts_sgmt=str_replace(" ","+",$smts_sgmt); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $smts_text=$smts_itms[2]; $sgmt_itms=explode(" ",$smts_type); // print_r($sgmt_itms); if (count($sgmt_itms) > 2) { $itms_cntr=count($sgmt_itms); // echo "
SMTS TYPE ".$smts_type; // print_r($subs_rslt); if ($srelt !=$smts_type) { $subs_rslt=xtrt_xxxx($smts_type,"nederlands","subs"); // print_r($subs_rslt); foreach($subs_rslt as $subs_key => $subs_val) { $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_lnks=$subs_dtls[3]; $subs_rchs=$subs_dtls[4]; $subs_array[$subs_rchs]=$subs_array[$subs_rchs]+1; // echo "
LNKS ".$subs_lnks." RCHS ".$subs_rchs; } $srelt=$smts_type; $ssmts_type=str_replace(" ","+",$smts_type); // echo "
".$smts_type."
"; } } } echo "
"; if ($srelt !=$smts_text) { // echo "
".$smts_type."
".$smts_sgmt."
".$smts_text."
".$itms_cntr."
"; $enrc_rslt=enrc_text($smts_sgmt); krsort($enrc_rslt); // print_r($enrc_rslt); foreach ($enrc_rslt as $enrc_key => $enrc_val) { // echo "
ENRC KEY ".$enrc_key." ENRC VAL ".$enrc_val; $enrc_dtls=explode("!!",$enrc_key); // print_r($enrc_dtls); $enrc_perc=$enrc_dtls[0]; $enrc_text=$enrc_dtls[1]; // echo "
SMTS SGMT ".$smts_sgmt." ENRC TEXT ".$enrc_text; if ($trelt != $enrc_text and $smts_sgmt != $enrc_text) { $trelt=$enrc_text; $enrc_wrds=explode(" ",$enrc_text); $srai_ptrn=$enrc_text; $srai_text= "
".$smts_sgmt."
"; if ($smts_type == 50) { $srai_text="* ".$smts_sgmt." *"; } if ($smts_type == 0) { $frst_array[$smts_sgmt]=$frst_array[$smts_sgmt]+1; $srai_text=$smts_sgmt." * "; } if ($smts_type == 99) { $last_array[$smts_sgmt]=$last_array[$smts_sgmt]+1; $srai_text="* ".$smts_sgmt; } // echo "
SMTS TEXT ".$smts_text." PATTERN ".$srai_ptrn." SRAI ".$srai_text; $enrc_array[$smts_sgmt."@".$srai_text."@".$srai_ptrn]=$enrc_array[$smts_sgmt."@".$srai_text."@".$srai_ptrn]+1; echo "
".$srai_text."
".$srai_ptrn."
"; } } $srelt=smts_text; } foreach($enrc_array as $enrc_key => $enr_val) { echo "
ENRC KEY ".$enrc_key."ENRC VAL ".$enrc_val; } ?>